supplied-by
: isspace?  ( ch -- f )  bl 1+ u< ;
